home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / kang / inmosque < prev    next >
Text File  |  1999-06-15  |  740b  |  31 lines
  1. Category: kang -
  2. Title: Inmosque
  3. Copyright: na
  4. Author: kangaroo@asan.com
  5. Filename: mosques.8bf
  6.  
  7. R:put(sqr(cos(tan(val(0,-255,255)*Y^y*ctl(1)*50/M)-sin(val(0,-255,255)*Y^x*ctl(1)*50))*(sqr(sin(sin(val(2,-255,255)*X^x*val(3,0,50)*40/M)-sin(val(2,255,-255)*Z^y*val(3,0,50)*40/M)))))/58,1),put(get(1)*255/21/255-45,0),get(0)&256?270+ctl(5)-(get(0)&511):get(0)
  8.  
  9. G:c+put(get(1)*255/21/255-45,0),get(0)&256?270+ctl(6)-(get(0)&511):get(0)
  10.  
  11. B:c+put(get(1)*255/21/255-45,0),get(0)&256?270+ctl(7)-(get(0)&511):get(0)
  12.  
  13. A:a
  14.  
  15. ctl[0]: minor flux
  16. ctl[1]: minor size
  17. ctl[2]: major flux
  18. ctl[3]: major size
  19. ctl[5]: der
  20. ctl[6]: neerg
  21. ctl[7]: eulb
  22.  
  23. val[0]: 19
  24. val[1]: 57
  25. val[2]: 98
  26. val[3]: 147
  27. val[5]: 132
  28. val[6]: 228
  29. val[7]: 235
  30.  
  31.